* lisp/ses.el (ses-print-cell): Fix alignment of text cells. (Bug#27653)

diff --git a/lisp/ses.el b/lisp/ses.el
index 9221476e7a152de97e1ccb66a89df07e34f2ce6b..4c19c70c5da3ace5149a4433353eab7d53c0dd3d 100644 (file)
--- a/lisp/ses.el
+++ b/lisp/ses.el
@@ -1254,8 +1254,7 @@ preceding cell has spilled over."
         ((< len width)
          ;; Fill field to length with spaces.
          (setq len  (make-string (- width len) ?\s)
-               text (if (or (stringp value)
-                            (eq ses-call-printer-return t))
+               text (if (eq ses-call-printer-return t)
                         (concat text len)
                       (concat len text))))
         ((> len width)